//===================================
// [] The PlutoEA Project []
// http://opensvn.csie.org/PlutoEA
// -----------------------------------------
// - Ǫ̳f~ӤH } -
//===================================
//= : 1.4 [5511]
//===================================

prontera,123,102,5	script	ӤH#pron	85,{
	set .@now_weight,MaxWeight-Weight;
	if (.@now_weight < 6301 || checkweight(1201,1) == 0) {
		mes "[ӤH]";
		mes "!";
		mes "AOWH?";
		mes "AaFӦhFF!";
		mes "A̦n@ǪFdԭܮw~";
		close;
	}
	mes "[ӤH]";
	mes "An!";
	mes "AS@ǹpw~";
	mes "ߩάOF?";
	mes "ǰǤ񵲴O? Oo, ڲ{b";
	mes "ܻݭnǪF.";
	next;
	mes "[ӤH]";
	mes "M, ڤ|KOnAǪF";
	mes "誺. Τ@~Ĥ5 Ӱ";
	mes "w~, 10 , άO10 ";
	mes "ǰǤ񵲴?";
	next;
	switch(select("n!:ڷQoOVB!:, .")) {
	case 1:
		mes "[ӤH]";
		mes "AڱaӤF?";
		mes "w~, , ٬OǰǤ񵲴?";
		next;
		switch(select("w~:ǰǤ񵲴::")) {
		case 1: callfunc "F_PotExchange",935,5;
		case 2: callfunc "F_PotExchange",909,10;
		case 3: callfunc "F_PotExchange",914,10;
		case 4:
			mes "[ӤH]";
			mes "na~";
			mes "S.";
			close;
		}
	case 2:
		mes "[ӤH]";
		mes "VB...?";
		mes "pGAݹLoǪF誺";
		mes ", ڤ~QVB, nn!";
		close;
	case 3:
		mes "[ӤH]";
		mes "na, S.";
		mes "pGAܥDN, Nӧ.";
		close;
	}
}

morocc,180,259,3	script	ӤH#morroc	85,{
	set .@now_weight,MaxWeight-Weight;
	if (.@now_weight < 6301 || checkweight(1201,1) == 0) {
		mes "[ӤH]";
		mes "!";
		mes "AOWH?";
		mes "AaFӦhFF!";
		mes "A̦n@ǪFdԭܮw~";
		close;
	}
	mes "[ӤH]";
	mes "An!";
	mes "AS@ǹpw~";
	mes "ߩάOФF?";
	mes "ǰǤ񵲴O? Oo, ڲ{b";
	mes "ܻݭnǪF.";
	next;
	mes "[ӤH]";
	mes "M, ڤ|KOnAǪF";
	mes "誺. Τ@~Ĥ5 Ӱ";
	mes "w~ߴ, 7 ڦФ, άO10";
	mes "ǰǤ񵲴?";
	next;
	switch(select("n!:ڷQoOVB!:, .")) {
	case 1:
		mes "[ӤH]";
		mes "AڱaӤF?";
		mes "~, Ф, ٬OǰǤ񵲴?";
		next;
		switch(select("~:Ф:ǰǤ񵲴:")) {
		case 1: callfunc "F_PotExchange",935,5;
		case 2: callfunc "F_PotExchange",916,7;
		case 3: callfunc "F_PotExchange",909,10;
		case 4:
			mes "[ӤH]";
			mes "na~";
			mes "S.";
			close;
		}
	case 2:
		mes "[ӤH]";
		mes "VB...?";
		mes "pGAݹLoǪF誺";
		mes ", ڤ~QVB, nn!";
		close;
	case 3:
		mes "[ӤH]";
		mes "na, S.";
		mes "pGAܥDN, Nӧ.";
		close;
	}
}

payon,200,134,5	script	ӤH#pay	85,{
	set .@now_weight,MaxWeight-Weight;
	if (.@now_weight < 6301 || checkweight(1201,1) == 0) {
		mes "[ӤH]";
		mes "!";
		mes "AOWH?";
		mes "AaFӦhFF!";
		mes "A̦n@ǪFdԭܮw~";
		close;
	}
	mes "[ӤH]";
	mes "An!";
	mes "AS@ǹpڤ";
	mes "F?";
	mes "ǰǤ񵲴O? Oo, ڲ{b";
	mes "ܻݭnǪF.";
	next;
	mes "[ӤH]";
	mes "M, ڤ|KOnAǪ";
	mes "~. Τ@~Ĥ6 ";
	mes ", 10 ǰǤ񵲴?";
	next;
	switch(select("n!:ڷQoOVB!:, .")) {
	case 1:
		mes "[ӤH]";
		mes "AڱaӤF?";
		mes ", ٬OǰǤ񵲴?";
		next;
		switch(select(":ǰǤ񵲴:")) {
		case 1: callfunc "F_PotExchange",902,6;
		case 2: callfunc "F_PotExchange",909,10;
		case 3:
			mes "[ӤH]";
			mes "na~";
			mes "S.";
			close;
		}
	case 2:
		mes "[ӤH]";
		mes "VB...?";
		mes "pGAݹLoǪF誺";
		mes ", ڤ~QVB, nn!";
		close;
	case 3:
		mes "[ӤH]";
		mes "na, S.";
		mes "pGAܥDN, Nӧ.";
		close;
	}
}

aldebaran,152,63,5	script	ӤH#alde	85,{
	set .@now_weight,MaxWeight-Weight;
	if (.@now_weight < 6301 || checkweight(1201,1) == 0) {
		mes "[ӤH]";
		mes "!";
		mes "AOWH?";
		mes "AaFӦhFF!";
		mes "A̦n@ǪFdԭܮw~";
		close;
	}
	mes "[ӤH]";
	mes "An!";
	mes "AS@ǹpΥ~";
	mes "ߩάOФF?";
	mes "ǰǤ񵲴O? Oo, ڲ{b";
	mes "ܻݭnǪF.";
	next;
	mes "[ӤH]";
	mes "M, ڤ|KOnAǪ";
	mes "~. Τ@~Ĥ1 ө";
	mes "Υ~, 7 ڦФ, άO10";
	mes "ǰǤ񵲴?";
	next;
	switch(select("n!:ڷQoOVB!:, .")) {
	case 1:
		mes "[ӤH]";
		mes "AڱaӤF?";
		mes "Ф?";
		mes "Υ~?";
		mes "άOǰǤ񵲴?";
		next;
		switch(select("Υ~:Ф:ǰǤ񵲴:")) {
		case 1: callfunc "F_PotExchange",955,1;
		case 2: callfunc "F_PotExchange",916,7;
		case 3: callfunc "F_PotExchange",909,10;
		case 4:
			mes "[ӤH]";
			mes "na~";
			mes "S.";
			close;
		}
	case 2:
		mes "[ӤH]";
		mes "VB...?";
		mes "pGAݹLoǪF誺";
		mes ", ڤ~QVB, nn!";
		close;
	case 3:
		mes "[ӤH]";
		mes "na, S.";
		mes "pGAܥDN, Nӧ.";
		close;
	}
}

geffen,173,88,5	script	ӤH#geff	85,{
	set .@now_weight,MaxWeight-Weight;
	if (.@now_weight < 6301 || checkweight(1201,1) == 0) {
		mes "[ӤH]";
		mes "!";
		mes "AOWH?";
		mes "AaFӦhFF!";
		mes "A̦n@ǪFdԭܮw~";
		close;
	}
	mes "[ӤH]";
	mes "An!";
	mes "AS@ǹp~ߩ";
	mes "OõF?";
	mes "ǰǤ񵲴O? Oo, ڲ{b";
	mes "ܻݭnǪF.";
	next;
	mes "[ӤH]";
	mes "M, ڤ|KOnAǪ";
	mes "~. Τ@~Ĥ5 ӥ~";
	mes ", 6 õ, άO10  ";
	mes "Ǥ񵲴?";
	next;
	switch(select("n!:ڷQoOVB!:, .")) {
	case 1:
		mes "[ӤH]";
		mes "AڱaӤF?";
		mes "~, õ, ٬OǰǤ񵲴?";
		next;
		switch(select("~:õ:ǰǤ񵲴:")) {
		case 1: callfunc "F_PotExchange",935,5;
		case 2: callfunc "F_PotExchange",915,6;
		case 3: callfunc "F_PotExchange",909,10;
		case 4:
			mes "[ӤH]";
			mes "na~";
			mes "S.";
			close;
		}
	case 2:
		mes "[ӤH]";
		mes "VB...?";
		mes "pGAݹLoǪF誺";
		mes ", ڤ~QVB, nn!";
		close;
	case 3:
		mes "[ӤH]";
		mes "na, S.";
		mes "pGAܥDN, Nӧ.";
		close;
	}
}

function	script	F_PotExchange	{
	if (countitem(getarg(0)) < getarg(1)) {
		mes "[ӤH]";
		mes "K, oNOҦAnڪ";
		mes ""+getitemname(getarg(0))+"?";
		mes ""+getitemname(getarg(0))+"!";
		close;
	}
	else {
		mes "[ӤH]";
		mes "na, ڬݬݧAh";
		mes ""+getitemname(getarg(0))+". ...";
		next;
		mes "[ӤH]";
		mes "A@@" + countitem(getarg(0)) + " "+getitemname(getarg(0))+".";
		mes "ڳ̦h൹A" + (countitem(getarg(0))/getarg(1)) + " ~Ĥ.";
		next;
		mes "[ӤH]";
		mes "?";
		mes "n?";
		next;
		if (select(".:.") == 1) {
			mes "[ӤH]";
			mes "ADΨ"+getitemname(getarg(0))+"";
			mes "iHh֬ĤFa?";
			next;
			mes "[ӤH]";
			mes ", ڤ@iHA1 ";
			mes "100 ~Ĥ. pGA";
			mes "FADN, J'0'Ө.";
			next;
			while(1) {
				input .@input,0,101;
				if (.@input == 0) {
					mes "[ӤH]";
					mes "...?";
					mes "npOlڥ?";
					mes "I, n?";
					close;
				}
				else if (.@input > 100) {
					mes "[ӤH]";
					mes "ڤ@AWL100 ~";
					mes "Ĥ. bոէa.";
					next;
				}
				else {
					break;
				}
			}
			set .@put_out_item,.@input * getarg(1);
			if (countitem(getarg(0)) < .@put_out_item) {
				mes "[ӤH]";
				mes "c, AJƦrnT. ";
				mes "A̦nAˬd@UA";
				mes "Ĥƶq.";
				close;
			}
			mes "[ӤH]";
			mes "A!";
			mes "ˬdUڭ赹AĤa, ";
			mes "iOD`Ϊ. , hΪ";
			mes "~";
			delitem getarg(0),.@put_out_item; //洫
			getitem 501,.@input; //Ĥ
			close;
		}
		mes "[ӤH]";
		mes "~";
		mes "na.";
		mes "Ao˪_Iaӻ, ";
		mes "ĤDSζ?";
		close;
	}
}